home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / Font / s / Font02 < prev    next >
Text File  |  1995-08-26  |  373b  |  21 lines
  1. ; Author: Copyright 1993 Shaun Blackmore
  2.  
  3.         GET     ^.h.regdefs
  4.         GET     ^.h.swinos
  5.         GET     ^.h.macros
  6.  
  7. ; os_error *Font_LoseFont(FontHandle font);
  8.  
  9. ;       r0=font;
  10.  
  11.  
  12.         PREAMBLE
  13.         STARTCODE Font_LoseFont
  14. ;
  15.         STMFD   sp!, {lr}
  16.         SWI     SWI_Font_LoseFont + XOS_Bit
  17.         MOVVC   r0,#0
  18.         LDMFD   sp!, {pc}^
  19. ;
  20.         END
  21.